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NOTICE TO USERS 


This documentation describes your 4010C01 PLOT 10 Interac- 
tive Graphics Library (IGL) Device Driver or your IGL 
Terminal Communications and Host File I/O Interface. The 
documentation for this option of IGL consists of the follow- 


ing: 


IGL Device Driver Options 


Foreword (this section you are reading). 


A "User's Information Sheet", to be placed behind the 
"Options" tab in the 4010C01 PLOT 10 Interactive 
Graphics Library (IGL) User's Manual. This "User's 
Information Sheet" instructs the user in how to use 
the device option and discusses related information. 
This "User's Information Sheet" is designed to be a 
part of the IGL User's Manual. 


Contents. 


An installation guide for the system programmer re- 
sponsible for installing the device driver. 


IGL Terminal Communications and Host File Interface Options 


Foreword (this section you are reading) 


A “User's Information Sheet" to be placed behind the 


"Options" tab in the 4010C01 PLOT 10 Interactive 


Graphies Library (IGL) User's Manual. This "User's 
Information Sheet" instructs the user in how to use 
the Terminal Communications and Host File Interface 
option and discusses related information. The "User's 
Information Sheet" is designed to be a part of the IGL 
User's Manual. 


Contents. 
Preface. 


Section 1 is an introduction to the option package. 
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FOREWORD 


e Section 2 describes installation procedures for the 
System programmer responsible for installing IGL. 


e Appendix A is a checklist for the use of the system 
programmer during the installation. 


DISTRIBUTION OF THIS OPTION DOCUMENTATION 


The documentation listed accompanies the IGL option software 
package you received. The documentation should be distrib- 
uted as follows: 


1. In the IGL System Reference Binder 


If the IGL Option you received is a device driver, 
behind the "Device Drivers" tab: place all of the 
device driver documentation you received except the 
"User's Information Sheet". The unprinted, colored 
sheet at the end of the device driver manual may be 
insluded to separate it from other device driver 
manuals behind this tab. 


If the IGL Option you received is a Terminal Communi- 
cations and Host File I/O Interface, behind the "Sys- 
tem Installation" tab: place all of the installation 
guide documentation you received except the "User's 
Information Sheet". 


2. In the PLOT 10 Interactive Graphics Library (CIGL) 
User's Manual Binder 


Behind the "Options" tab in the back of the PLOT 10 
Interactive Graphics Library (IGL) User's Manual: 
place the "User's Information Sheet” that is included 
behind this Foreword at the beginning of your device 
driver or installation guide manual. This “User's 
Information Sheet" provides needed information for the 
user. 
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USER'S INFORMATION 


USER'S INFORMATION SHEET: 
DEVICE-DEPENDENT INFORMATION FOR 
IGL OPTION 1D, 4662 DEVICE DRIVER 


DEVICES SUPPORTED 


This device driver supports the Tektronix 4662 Interactive 
Digital Plotter. 


HOST COMPATIBILITY 


The 4662 Device Driver can be used only with Host I/0 
implementations that support full ASCII terminal communica- 
tions. 


LOCATE OPERATIONS 


LOCATE operations are performed using the joystick and the 
CALL button on the front panel of the plotter. When graphic 
input from the plotter is requested by the program, the 
prompt light on the 4662 comes on. 


At this time, you may use the jcystick to position the 
cursor to the desired position, and press the CALL button to 
send the location of the pen to the computer. If you desire 
to terminate a LOCATE operation before entering all the 
points requested, hold the CALL button down on the last 
point until the plotter beeps. 


PROMPTED INPUT 


Prompting messages and operator input should have as little 
effect on the graphics output as possible. On 4020 Series 
Terminals, for example, this condition is met by performing 
prompted input dialog in the monitor area, leaving the 
workspace unaffected. 


On the 4662 Plotter all output with text quality "1" 
(including prompting messages from IGL routines GETUTX, 
GETURN, and GETUIN) goes to the controlling terminal. Before 
the prempt string is sent to the terminal, IGL turns off the 
plotter by sending it an "ESC: plotter-address F" message, 
which then allows the prompt string to be printed on the 
terminal. The plotter remains off while the user replies to 
the prompt. After the user has completed the reply, IGL 
turns the plotter back on with an "ESC plotter-address E" 
command. 


IGL 4010C01 OPTID @ ; Addendum-1 


USER'S INFORMATION 


Since the plotter does not turn back on until the whole 
command is received, the "ESC plotter-address" part of the 
command will also be sent to the terminal. Most terminals 
will not print the ESCape character (ADE 27), but the 
plotter-address character (usually "A" or "B") will appear 
on the terminal, unless the terminal is programmed to 
"swallow" escape sequences (as the 4014 does). This extra 
plotter-address character which appears on the terminal may 
be safely ignored, as it does not affect the program. The 
"E" part of the command is not sent to the terminal, but 
turns the plotter back on so that graphic output can 
continue. 
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INSTALLATION GUIDE FOR THE OPTION 1D 4662 DEVICE DRIVER 


NOTE 
After completing the installation of your IGL 4662 Device 


Driver as described | below, return to the manual that 
referenced this section and continue with the next s Step. 
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GENERAL INFORMATION 


The IGL Option 1D 4662 Device Driver supports the Tektronix 
4662 Plotter. Two files are included on the source medium: 


e OPT1iD MORTRAN source. 


@ OPT1D FORTRAN source. 


INSTALLATION PROCEDURE 





To install the Option 1D 4662 Device Driver, you must ° 
modify: 


@ Both the MACROS file and the MORTRAN source, if you 
are uSing the MORTRAN processor; or 


@ The FORTRAN source, if you are not using the MORTRAN 
processor. 


USING THE MORTRAN PROCESSOR 





NOTE 





If you are not using the MORTRAN processor, go directly 
to the following step, entitied "Using the FORT RAN 


Source". °: | ee net eR ee Pe, 
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Device Driver Feature Switches 
If you are using the MORTRAN processor, modify the MACROS 
file as follows: after the comment "DEVICE SWITCHES” at the 
bottom of the MACROS file, add the line of code: 
FEATURE~ON-TEK4662; 
This causes the MORTRAN processor to generate code linking 
the PLOT 10 IGL package to the 4662 device driver. 
Device Dependent Constants 
There are four values that control the operation of the 4662 
Plotter. The code to be modified to change these values can 
be found after the line "SYSGEN CONSTANTS" at the bottom of 
the MACROS file. 
1. The plotter address can be set to one of four values 
using the switches on the back of the plotter. To make 
a corresponding change in the device address output by 
IGL from its default value "A", find the line 
CONSTANT ** *DEF AULT -NADDR* *# (65); 


and replace the "65" by the ADE value of the desired 
device address. 


2. The prompt character can be changed from the default 
(no prompt) by replacing the "0" in the line 
CONSTANT ** *DEF AULT -N PROMPT *** (0); 
by the ADE value of the desired prompt. | a 
3. The turnaround delay time is 10 milliseconds. Change 
the "10" in the following line: 
CONSTANT ***DEF AULT -N DELAY ***(10); 
to the desired ADE value. 


4. The bypass cancel character is linefeed (ADE 10). 
Change the "10" in the line 
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CONSTANT ***DEF AULT -NBYPAS***(10); 


to the desired ADE value. 


Details on the effects of these constants can be found in . 
the PLOT 10 4662 Interactive Digital Plotter User's Manual. 


NOTE 


ee ee a EEEEREnneteteaeienenmenemn men a emteeenienee teed ne nine 
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USING THE FORTRAN SOURCE 


NOTE 


If you are not using the FORTRAN source, go back to the 
section "Using MORTRAN Processor", or return to the 
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Device Driver Features 
If you are installing the FORTRAN version of IGL, you must 
locate five device driver routines. In each routine, change 
the error report to a CALL linking the 4662 device driver 
routines with the package. 
In the routine DDSEND, locate the line 
NERROR=22834 
and replace it with the line - ( 


CALL DS662 


In the routine DDCNTL locate the line ° 
NERROR=22334 
and replace it with a line reading 


CALL DC662(ICODE, ICNT, PARRAY) | ss 


In the routine DDGRPH, locate the line 
NERROR=22034 
and replace it with a line reading 


CALL DG662(ICODE, ICNT, PARRAY) 


In the routine DDGIN, locate the line 


NERROR=22134 
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and replace it with a line reading 


CALL DI662(ICODE, INCNT, IOUTC, IARRAY, PARRAY, ITYPE) 


In the routine DDOUT, locate the line 


NER ROR =22234 


and replace it with a line reading 


CALL DO662(ICODE, ICNT, IARRAY, PARRAY) 


Device Dependent Constants 


There are four values that control the operation of the 4662 
Plotter. Code must be added in the routine INIDD to set 
these values. . | 


1. 


The plotter address can be set to one of four values 
using the switches on the back of the plotter. So that 
IGL knows the device address set on your plotter, add 
these two lines to INIDD before the call to NEWDEV: 


C(1)=65 
CALL DC662(10,1,C) 


If another device address besides "A" is desired, 
replace the "65" by the ADE value of the desired 
device address. 

Add these two lines to INIDD: 


C(1)=0 = 
CALL DC662(10,2,C) 


The prompt character can be changed from the default 
(no prompt) by replacing the "0" with the ADE value of 
the desired prompt. . ; 

Add these lines: 


C(1)=10 
CALL DC662(10, 3, C) 


The turnaround delay time is 10 milliseconds. Change 
this to the desired value in the first line. 


Add these lines: 
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C(1)=10 
CALL DC662(10,4,C) 


The bypass cancel character is linefeed (ADE 10). 
Change it, if necessary, in the first line. 


Details on the effects of these changes can be found in the 
PLOT 10 4662 Interactive Digital Plotter User's Manual. 


NOTE 





Now, go back to the main installation guide that refer- 
enced this’ manual. 
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SECTION 1 


INTRODUCTION 


This Verification Routine tests with the 4662 AOl Plot 10 Utility 
Routines and TCS. Correct plotter functioning is verified by compar— 


ing test output against known standards. 


The Verification Routine consists of a driver program, ten test 
subroutines, and an error message subroutine. The sequence tests 
every TCS area and the 4662 AOl Utility Routines to ensure that 
each function and subroutine is called. Some of the tests can 
only be run on the terminal. Other tests can be on the terminal 
and/or plotter although the results may be different. These 
differences are defined in the descriptions of the various tests. 


Areas to be verified are as follows: 


1. System 1/0 (Terminal only) 

2. Alphanumeric 1/0 (Terminal only) 

3. Alphanumeric Control (Terminal and plotter) 

4. Screen Level Graphics (Terminal and plotter) 

5. Virtual Level Graphics (Terminal and plotter) 

6. Graphic Input (Terminal only) 

7. Other Utility Routines (Terminal only) 

8. 4014/15 Enhanced Support (Terminal only) 

9. General Plotter Control and Output (Terminal and Plotter) 


10. Plotter Status Checking and Graphics Input (Terminal and Plotter) 
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IMPLEMENTATION | 


The Verification Program, available on paper tape or punched cards, 
and can be tailored to meet unique requirements of the system to be 
tested. The Verification Routine is a separate card deck or paper 


tape and is not a part of the 4 Utility Routines. 


No job control or program control records are included, and any such 
necessary code must be added. The Verification Routines can then 
be implemented and executed by compiling and linking the program 


with the Utility Routine library. 

Special Considerations 

Individual subroutines may be extracted from the program and executed 
as stand-alone programs. Necessary modification will generally require 
removal of SUBROUTINE and RETURN coding, and insertion of CALLs to 


INITT, TERM (if needed), and FINITT. 


Test number 1 is an exception and no CALLs should be inserted. . STOP 


is the only additional instruction needed. 


The ERRMS (Error Message) subroutine must be available for tests 1, as 


7, 8, and 10. The error messages are shown in Appendix A. 

The PAUSE routine is used in all tests except test 1. 

The PLPREP routine is used in tests 3, 4, 5, 9 and 10. 

When a test has been extracted, the remaining Verification Routines can 


be executed if a CONTINUE statement is substituted for the CALL to the 


extracted test. 
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EXECUTION 


Before any test routine may be called, the driver program requires 
input of four facts: 
Transmission Rate -- Expressed in characters-per-second. 
Determined by dividing the terminal’s 


baud rate by ten. 


Terminal Type -= Formats for terminal type and buffer 
Buffer Type -~ A type are described in the TCS User's 
Device Address —> Manual discussion of the subroutines 


TERM and SETBUF. Device address format 
is described in the 4662A01 Utility 
Routine User's Manual section on sub- 


routine PLINIT. 


ENTER NEXT TEST indicates that the necessary information has been 
accepted, and testing can be started. Your reply can be any number 
from # to 11, followed by a CR (Carriage Return). Entering a 0 will 
cause all tests to be run sequentially (starting with test 1). To 
run a specific test, enter the desired test number (1, 2, 3, etc.). 


Entering 11 will terminate the program by calling FINITT. 


Each test ends by requesting input. This feature allows time to 

study test results or to make hardcopies. Input of any character will 
cause the program to continue to the next test, or to print ENTER NEXT 
TEST again. 


All tests providing the option of plotter or terminal output require 
a P or T entry to declare the option selected. If the plotter is 
chosen, B or C must be entered to indicate Block or Continuous mode 


output. 


User input is required by tests 1,2,6, and 1% before execution and 


is explained in individual test descriptions. 
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MAINLINE PROGRAM OPERATIONAL CONSIDERATIONS 


This section contains test descriptions and samples of satisfactory 
results, but variations attributable to system differences must be 
considered. For example, the 4010 does not support lower-case or all 
special characters, and the 4014 with Enhanced Graphics Module differs 


from other terminals when reacting to some control characters. 


The ? in the examples is a system prompt and may be different (if used) 


for your system. 


INITT, ANMODE, NEWPAG, FINITT, and PLINIT are tested in the verification . 
routines, and no other testing medium is available to them. Test number 
1 does not call INITT or NEWPAG however, and the screen should be cleared 
before execution. Just press the PAGE key before replying # or 1 to 

the ENTER NEXT TEST request. 


When your results are compared to the output standards reproduced here, 
any discrepancies should be traced. The following descriptions and 


verification routine source code will be helpful tools. 


RESULTS (4014 with EGM) 


ENTER CHAR/SEC: ? 39 
ENTER TERMINAL TYPE: ? 3 
ENTER BUFFER TYPE: ? 3 
ENTER DEVICE ADDRESS ? 1 
ENTER NEXT TEST? ? @ 
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SECTION 2 


TEST DESCRIPTION 


This section contains a description of each of the tests with 


examples of the expected test outputs. 


TEST NUMBER 1, SYSTEM I/O (Terminal only) 


This test generates 12 rows of ASCII characters, 
8 characters per row, with ASCII Decimal Equivalent (ADE) values 
in the range 32 through 127. 


The 4010 terminal cannot correctly print character values exceeding 
95, and SP (ADE = 32) and RUBOUT (ADE = 127) should appear as blanks 
on all terminals. Any other discrepancies must be corrected if TCS 


output is to be reliable. 


Character sequence HT, A, LF, B, BS, VI, C, CR, and D is then generated. 
(ADE = 9,65,16,66,8,11,67,13, and 68). If the display does not 
correspond to the sample shown, control characters are not correctly 


generated, or your terminal is not responding correctly. 


The "CR*>CR/LF" and "LF>CR/LF" straps may have affected output. 


These straps should not normally be enabled. 


If CR, LF, or BS do not cause the appropriate action, TCS subroutines 
CARTN, LINEF or BAKSP may require modification. HT and VT are not 


used by Tektronix software and do not require adjustment. 


Remaining control characters (except ESC and FF) are displayed, each 
followed by a lower case alpha character. ESC and FF are easily tested 
by calling the INITT routine. If a page erase occurs, ESC and FF 

are functioning correctly. The WX on the 4010 and the VWX on the 4014 
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do not appear in the control character display because the FS and GS 


characters put the terminals into graphic mode. 


When INPUT CHARS is displayed, enter any number of characters followed 
by a Carriage Return. The ASCII equivalents of one character line 


will be returned. This procedure will occur five times. 


NOTE 


It is possible to overrun your system input buffer, 
which may cause a fatal system error. In addition 
the input array is dimensioned to 132, therefore 
inputting of more than 132 characters will change 
the value of other variables. 


The number of characters returned by the ADEIN subroutine is output 
with the ASCII values of the first 20 characters (depending on the 
number of ASCU values which will fit on the line). Control characters 


may or may not be returned, depending on the systerm characteristics. 


Error message ERROR # 01 indicates that the TCS ADEIN routine has 
returned less than zero characters, or that trailing blanks have not 


been suppressed. 


INPUT A.D.E. should be answered with a value within the 0 to 127 range, 
followed by a CARRIAGE RETURN. The number entered will be translated 
into an ASCII character, and output will be followed by a CR/LF. On 
all terminais, the control characters BEL (7), LF(10), and VT(11) 

will vary from the effect of NUL(O). On the 4014/15, ESC(27) will 


also vary. 


The INPUT A.D.E. procedure is repeated until any value larger than 127 


is entered. 


The final phase of this test generates four squared spirals, one for 
each buffer type. Variable KUNIT in the INITT routine should be set 


to a value corresponding to the number of the best spiral. If all 
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spirals appear to be equal, buffer type 3 is recommended for time-share 


systems, and type 4 for dedicated systems. 


If buffer types 3 and 4 cause cancellation of graph mode during the 
first ring of the spiral, and the carriage return following output 
from ADEOUT cannot be suppressed, buffer type 1 or 2 must be used. 
Buffer types and interline characters are discussed in detail in TCS 


Implementation Notes. 


The resulting output is shown in Fig. 2-1, : 


- TEST 201 

1*2g%xg’ 
()X+,-.7 
01234567 
892;3<#)>? 
@ABCDEFG 
HIJKLMNO 
PQRSTUUU 
XYZEN Ia. 

‘abcdefg 
hi sk lmno 
a 

zli}e~ 
D C 

B 
abcde! pen ean ee ae 
INPUT ha $3? ABCDEFG 
07 65 66 67 68 69 70 71 
INPUT CHARS:? 1234567 
07 49 58 Si Se 53 54 55 
INPUT CHARS: ? |! @#$%A& 
0? 33 64 35 36 37 94 — 
INPUT CHARS:? 373*,<.>/? 
10 59 39 58 34°44 68 46 Ge 47 63 
INPUT CHARS?? WXYZ 

88 89 9 


INPUT ADE. 

INPUT A.D.E.! ? 46 
INPUT A.D.E.t ? 78 
INPUT A.D.E.: ? 999 


Fig. 2-1. Test 1 Results (4014 with EGM) 
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TEST NUMBER 2, ALPHANUMERIC I/O (Terminal only) 


This test determines whether or not the A.D.E./FORTRAN A-format 
translation routines are working correctly. An array containing the 
special ASCII characters is used. If there is a translation error, 
the array is displayed in "before" and "after" translation status. 
ERROR #02 indicates Al translation errors, and ERROR #03 denotes 


an Am error. 

The program next displays INPUT CHARS and accepts up to 48 character 
entries, terminating with a CARRIAGE RETURN. The character string is 
input through ALIN, and output through AOUTST. 

On systems with limited character set sizes, some special characters 
may not be translated. Familiarity with the system being used will 


indicate whether or not a problem exists. 


The test results are shown in Fig. 2-2, 
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TEST 02 | 

ERROR #02 
1° SS%8? ( )X+,-./01234567893 3 (=> P@AZENIJA_* az {| }~ 
"$$ &’ ()K+,-./80123456789!3<¢=>? AZL Ja AZ 


ERROR $03 


PP SSXR% C)X+,-./0123456789! ; (=> P@AZL\JA_* az{{)~ 
"$$ &'()k+,-.70123456789: 3<=>? AZE Ja az 


INPUT CHARS: 
? AaBbCc 


AABBCC 
INPUT CHARS: 
2? XYZ 345 


AYZ 345 


Fig. 2-2. Test 2 Results (4014 with EGM). 
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TEST NUMBER 3, ALPHANUMERIC CONTROL (Terminal and Plotter) 


Margin setting and tab setting routines are used by this test, and 
available character sizes are measured and displayed. If the 


specified terminal type is 1, all character sizes will be identical. 


Next, the pattern DAC 
B is displayed. If the pattern is not correct, 


CARTN, LINEF, and BAKSP routines may require use of graphic moves 
Yather than control characters. 

The final output is a series of digits, 0 through 9, repeated nine 
times for margin testing. The series is displayed twice, first with 
narrow margins, then with default margins. 


PLOTTER 


The plotter test is identical to the terminal test described above 


except that margin tests are omitted. 


The test results are shown in Figs. 2-3 and 2~4. 
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CHARACTER SIZE 
CHARACTER SIZE 
CHARACTER SIZE 


CHARACTER SIZE 


Fig. 2-3. 
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#1 IS 14 BY 22 
#2 IS 13 BY 21 
3 Is 99 BY 13 


64 IS 88 BY 12 


Test 3 Results (Plotter) 
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Test 3 Results (4014 with EGM) 


Fig. 2-4. 
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TEST NUMBER 4, SCREEN GRAPHICS (Terminal and Plotter) 

Test 4 generates five test patterns, using screen level graphics routines. 
The first pattern uses absolute moves, draws, dashes, and points; the 
second duplicates the pattern with relative graphics. 

KIN and KCM are tested by the generation of the two "ruler" patterns, 

and the diamond pattern is drawn to ensure that PLTCHR converts nega- 

tive coordinates to zero. 

PLOTTER 


Test output is the same on the plotter as on the terminal. 


Test results are shown in Figs. 2-5 and 2-6. 
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Fig. 2-5. Test 4 Results (4014) 
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Fig. 2-6, Test 4 Results (Plotter) 
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TEST 5, VIRTUAL GRAPHICS (Terminal and Plotter) 

Five grids are drawn to demonstrate polar, linear, and three log 
transformations. Absolute and relative moves, draws, and points 

are used. 

Polar transformation is used with absolute and relative dashes to 
create the upper set of circles, while linear absolute and relative 
dashes with rotation are used for the lower set. The complex figure 
between the circle sets is produced by scaling and clipping. Any 
pattern discrepancy indicates a TCS error. 

PLOTTER 


Test output to the plotter is identical to that of the terminal. 


The test results are shown in Figs. 2-7 and 2-8, 
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Test 5 Results (Plotter) 
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TEST DESCRIPTION 


TEST NUMBER 6, GRAPHIC INPUT (Terminal only) 


Screen and virtual graphic input are tested when any of the following 


characters are entered. 


CHARACTER MEANING 
B ring the bell 
D draw to this point 
E erase the screen 
F finish the test (more input must follow as 


in other tests) 

make a hardcopy of the display 

list the point in screen or virtual coordinates 
move to this point 


go to screen level graphics 


<a © RF mw ow 


go to virtual level graphics 


Corners of the display window are indicated by the crossed lines which 
are also useful for testing the accuracy of the terminal crosshairs. 
Listed virtual coordinates outside the window will appear at the last 


point moved or drawn to. 


For terminals or computer systems which do not support GIN mode, this 
test may be utilized by entering from 1 to 5 characters through the 
keyboard. If the first character is one of those listed above, and 

if the remaining characters have values within the 32 to 63 range, 

the request for graphic input will be satisfied. For example, the 
character string D+?/? followed by a CARRIAGE RETURN will cause a draw 


to the center of the screen. 


PLOTTER 


No plotter testing is conducted by this program. 


The test results are shown in Figs. 9 and 10. 
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Fig. 10. Test 6 Results (4014) 
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TEST NUMBER 7, OTHER UTILITY ROUTINES (Terminals only) 

This test verifies the status setting and viewing routines. When a 
short dashed line is produced, the test has been satisfactory. 
Error messages 4 through 14 are issued when errors are encountered. 
An error message table is included in Appendix A. 

PLOTTER 


No plotter testing is conducted by this program. 


The test results are as follows: 


Test 7 (4010) Test 7 (4014) 
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TEST NUMBER 8, 4014/15 ENHANCED SUPPORT (Terminal only) 


Software support of the 4014 or 4015, with Enhanced Graphics Module, 
is the subject of this test. Two squares, an octagon, and several 
vectors in write-through mode are drawn. If terminal type 3 was 
indicated, but you do not have a 4014/15 with EGM, the larger square 
will be drawn twice, the octogon will be changed to alpha characters, 


and the write-through vectors will be drawn and stored. 


If terminal type 3 was not indicated, ERROR #15 will be displayed and 
the test will terminate. 


PLOTTER 
This test does not involve plotter output. 


The 4010 test results are as follows: 


co) g@ty 
LER #15 


¢ 


The 4014 test results are shown in Fig. 2-11. 
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Fig. 2-11. Test 8 Results (4014) j 
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TEST NUMBER 9, PLOTTER OUTPUT (Terminal and Plotter) 


= Terminal output is identical to that described for the plotter except 


as follows: 


Part 


Part 
Part 


m Part 


PLOTTER 
This test 


Part 


Part 
Part 


ae Part 


Part 


Part 


Part 


Part 


no alternate fonts are available, so all lines will 
be identical; 


rotated text is not printed; 


on the 4014 terminal, the first 5 characters of the 
size variability test wlll be identical; 


on the 4010 terminal, all. 9 characters will be identical. 


consists of eight parts which are described below. 


Seven + signs are drawn in a position pattern controlled 
by using tab, space, VT, LF and Backspace. 


All 96 printable characters will be drawn on the plotter. 


Nine variable characters from the six alternate fonts 
will be drawn. 


Intermixing of alpha output and graphic output will be 
verified. The letters A,B,C,D,E,F, and G are printed 
in a pattern using graphic moves between each character. 


Rotated text, with reference lines to indicate correct 
angles, will be drawn. 


Character size is verified by drawing nine A's. The 
first five are varied from tall and thin to short and 
wide, while the last four are approximations of 4014 
character size. 


A square pattern to verify moves, draws, and dashed 
lines is drawn. The test also determines if adequate 
time has been allowed to permit the pen to be raised or 
lowered during drawing of many vectors. 


A circular pattern is drawn to verify time allowed to 
draw a large number of vectors. 


Test results are shown in Fig. 2-12 and 2-13. 
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Fig. 2-12. Test 9 Results (4014) 
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TEST NUMBER 10, PLOTTER GRAPHIC INPUT (Terminal and Plotter) 


Terminal tésting is identical to that of the plotter except that 
the graphic crosshair cursor is enabled and an "M" or "D" must be 
entered to produce a move or draw. PENLOC cannot be used to find 


the position of the beam on the terminal. 
PLOTTER 


Pen location and pen status are checked by calling PENLOC after moving 
the pen to a known position. The known and actual positions are then 
compared. If the positions do not agree, ERROR #16 is displayed. The 
test is executed 10 times, and the patterns are moved diagonally 


across the page. 


ENTER # OF POINTS is then displayed on the terminal screen, indicating 
that input is needed. A single digit should be typed to specify the 
number of graphic input points to be accepted. The plotter PROMPT 
light will be turned on, and when the CALL button has been pressed 

the specified number of times, the PROMPT light will be turned off. 


The pen is then moved to the first point entered, and moves or draws 
are executed to each succeeding point, according to whether the pen 


was up or down when the CALL button was pushed. 


NOTE 


If multiple moves are performed (without drawing) the 
4662 plotter logic will optimize the operation and 
only move to the last point specified. 


The GIN portion of this test is repeated until a zero value is entered 
in response to the ENTER # OF POINTS. 


Terminal test results are shown in Fig. 2-14, 
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Fig. 2-14. Test 10 Results (4014) 
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#61: 


#@2: 
#93: 
#O4: 


#D5: 
#96: 
#97: 
#98: 
#09: 
#19: 
#11: 
#12: 
#13: 


#14: 


#15: 
#16: 
#17: 


APPENDIX A 
ERROR MESSAGES 


ADEIN returned a character count of less than zero, or the 
last character returned was a space. (Some implementations 
of ADEIN may return trailing spaces which were typed by the 


user. ) 


A translation difficulty exists in KAS2Al and/or KAL12AS. 

A translation difficulty exists in KAS2AM and/or KAM2AS. 

SETBUF and/or SEEBUF do not work right; probably SETBUF does 
not handle buffer type 4. 

SETBUF and/or SEEBUF do not work right. 

DWINDO and/or SEEDW do not work right. 

TWINDO and/or SEETW do not work right. 

MOVABS and/or SEELOC do not work right. 

GENFLG and/or the flag setting routine PCLIPT do not work right. 
VECMOD and/or SEEMOD do not work right. 

RSCALE, RROTAT and/or SEEREL do not work right. 

LOGTRN and/or SEETRN do not work right. 

TERM, CHRSIZ and/or SEETRM do not work right; probably TERM sets 
IM (see éede in test 7) to 4096. 

SETMRG and/or SEEMRG do not work right. 

Terminal type 3 was not selected in the mainline initiation. 
PENLOC 2nd/or Pen status do not work right. 

PLCOPY does not work right. 
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APPENDIX B 


SUBROUTINE CALLING REFERENCE CHART 


D = Direct Call 


I = Indirect Call 
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ALIN 
ALOUT 
ANFIN 
ADF OUT 
AINST 
AL FMON 
ANCHO 
ANMODE 
ANSTR 
ANUTST 
RAKSP 
BELL 
BUFFER 
CART" 
CHRSTZ 
CLIPT 
CSTZF 
CWwSEND 
CZAXIS 
DASHA 
NASHR 
DASHSA 
DASHSEK 
NCURSR 
NIGPAK 
DMGIEN 
DRAWA 
DRAWR 
DRAWSA 
DRAWSR 
DRWABS 
NRAREL, 
DSHARS 
NSHMON 
NSHREL 
OwITNDOA 
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FINITT 
GENFIG 
HOCOPY 
HOME 
TNCPLT 
INITT 
IQWATrT 
IPMON 
KALAPAS 
KAM2AS 
KAS2Al 
KAS2A' 
KM 
KIN 
LEFTIO 
LINEF 
LINHGT 
LINROT 
LINTR*! 
LIUW] 
LOGTR.: 
LVLCRT 
MOVABS 
MVEA 
MOVER 
MOVRE LL. 
NEWL I’) 
NEWPAG 


PARCLT - 


PCLIPT 
PENLOC 
PL CHAR 
PLCQPY 
PLOFF 
PLON 
PLTCH 
PLINIT 
PNTABS 
PNTMM) 
PNTREL 
POTNTA 
PQINTR 
POLTRv 
PSCAL 
PSPEEL) 
RECOVR 
RFL2A4Y 
RESCAL 
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RESET 
RESTAT 
REVCAT 
RROTAT 
RSCALE 
RSTTAS 
SCURSR 
SFERUF 
SEF DY 
SEELOC 
SEEMO) 
SEE™PG 
SFERF | 
SEFTR™ 
SEFTR 
SERT4- 
SETRUF 
SETMRE, 
SFITTAS 
SVSTAT 
SwIsha 
TARHE < 
TARVE? 
TERIA 
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Section 1 


_ GENERAL INFORMATION 


GENERAL 


The 4662A01 Plot 10 Utility Routines, functioning as an extension to the 4010A01 Plot 10 
Terminal Control System (TCS), enable the Plotter and a graphic terminal to perform as a 
unified system. Typical 4662/terminal system configuration is shown in Fig. 1-1. 





COMPUTER 4662 TERMINAL 


Fig. 1-1. Typical Configuration. 


INTRODUCTION 


The 4662 Piotter is an Input/Output device, driven from a host computer. The user chooses the 
height, width, and orientation of characters to be drawn, and available software provides the 
ability to move and draw to absolute or relative locations. 


‘Some plotter features, not available to a graphic terminal, require new support routines. Other 


features require modification of the existing TCS package to provide complete support for the 
plotter. 


Plotter multiplexing is not supported by these routines. As many as four plotters may be 
addressed by unique device codes, but only one device code can be active at any given time. 


REFERENCE INFORMATION 


This manual describes the Utility Routines, but the user must also be familiar with TCS and the 
4662 Plotter. Additional information is available in the following manuals: 
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TCS USER'S MANUAL . 062-1474-00 


4662 PLOTTER USER’S MANUAL 070-1932-00 


4662 A01 IMPLEMENTATION NOTES 070-2160-00 


The TCS SYSTEMS MANUAL (070-4113-00) provides more reference information, but is not 
generally required for normal 4662/TCS operation. 


ASCII Decimal Equivalents (ADE) referred to in this manual are defined by the ASCII Code 
Functions chart in Appendix D. 


PACKAGE DESCRIPTION 


The Utility Routines comprise a FORTRAN subroutine package for TCS. Some routines are 
entirely new; others replace existing routines. TCS supplies the clipping, scaling, relative 
addressing, dash line drawing, and point plotting features, but the alpha character scaling and 
rotation are provided by new routines. These Utility Routines do not affect normal TCS 
operation except to provide 4662 compatibility. 


Through interaction with the host program, the new or modified routines can be used to 
preview output on the terminal screen before it is sent to the plotter. Because some plotter 
features are not available on the terminal, limitations are imposed on the ability to preview all 
plotter output in its exact form. These exceptions are detailed with the descriptions of routines 
in this manual. 


A simple application of the 4662/TCS operation is shown in the foliowing example, and piotter 
initialization procedures are indicated by the comment statements in the program listing. The 


_ program uses the CHRSIZ routine to generate a line of print in each of four character sizes as 


shown below: 


CHARACTER SIZE 1 


CHARACTER SIZE 2 
CHARACTER SIZE 3 
CHARACTER SIZE 4 


NOTE 


To enable addressing up to 4096 points (and up to four standard character sizes), 
terminal type 3 is required. Terminal type 1 or 2 will result in a fixed character size. 
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INTRODUCTION 


The INITT, PLINIT, and PLON subroutines are called to activate the plotter and are issued 
. immediately after the appropriate data statements. The subroutines are normally called in the 
sequence shown in the listing which follows: 


DIMENSION KDATA(15) 
DATA KDATA/'C','H','A', RE, tA’, 'C''T! te’ IR, 
*” fT JOR a Ae / 
C * INITALIZE THE TERMINAL CONTROL SYSTEM (TCS) 
C * STATUS AREA 
CALL INITT(30) 
C * INITIALIZE THE PLOTTER STATUS AREA 
CALL PLINIT(1) 
C * DIRECT THE OUTPUT TO THE PLOTTER 
CALL PLON 
DO 100 ICSIZE=1,4 
C * SET THE CHARACTER SIZE 
CALL CHRSIZ(ICSIZE) 
C * MOVE TO A NEW LINE 
CALL NEWLIN 
C * OUTPUT THE STRING ‘CHARACTER SIZE' 
CALL Al0UT(15,KDATA) 
C * OUTPUT THE CHARACTER SIZE (1,2,3 OR 4) 
CALL ANCHO (ICSIZE+48) 
100 CONTINUE 
C * DIRECT THE OUTPUT BACK TO THE TERMINAL 
CALL PLOFF 
C * EXIT FROM TCS AND STOP 
CALL FINITT(100,100) 
END 


The PLOFF subroutine directed all further output to the terminal, indicating that plotter work 
was finished. FINITT was then called to terminate the program and exit from TCS. 


TERMINOLOGY 


The terms in Table 1-1 are used throughout the Utility Routine Descriptions. Greater detail, if 
necessary, is provided when the term is first used tn the text. 
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INTRODUCTION 


TERM 


CONTINUOUS MODE 


BLOCK MODE 


TABLE 1-1 


UTILITY ROUTINES TERMINOLOGY 
DEFINITION 


Data sent to the plotter in a steady stream at a constant rate. The data is padded with 
SYNC characters to prevent buffer overflow. Used for direct connect or low-noise 
communications lItnes. 


Data sent to the plotter in blocks without padding characters. Checksum error checking 
is provided in Block mode operation. Used for noisy or error-prone communication lines. 


NOTE 


Plotter operation is the same in Continuous or block mode and the use of either mode does not have a 
detrimental aftect on plotter speed or operation. 


BUFFER TYPE 5 
TURN-AROUND 
PROMPT MODE 


BYPASS MODE 


STANDARD MODE 


COPY MODE 


' SIGNATURE 


1-4 


Buffer type 5 is a new buffer type added to the Utility Routines to accommodate Block 
Mode transmission. 


The time required for a half-dupiex communication line to change from “talking” to 
“listening”; or from “listening” to ’talking”. 


Sets the plotter logic so output from the plotter is not transmitted until a designated 
character is received by the plotter. 


Prevents characters sent from the plotter and echoed by the computer from appearing on . 
the terminal or the plotter. Echoed graphic input data and device status information are { 
examples of “bypassed” data. 


Sets the plotter to use the full width of the plotting surface. This may cause some data 
from the terminal screen to be "scissored” from the top when displayed on the plotter. 
This possiblity of data loss is detailed in appendix B. 


Resets the right boundary and changes the Y address range of the plotter drawing 
surface to permit display of all data from the terminal screen. 


A special character appended to the front end of data sent to the host. Used to identify the 
sending device. 
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Section 2 


USER ROUTINES 


The 4662A01 Plot 10 Utility Routines are new or modified routines which permit TCS to 
accommodate the 4662 Plotter. These routines are compatible with release 3.3 of TCS, or 
updated versions of earlier releases. 


Plotter user and modified TCS user routines are listed below in the order in which they are 


described. 


\ 


PLOTTER USER ROUTINES 


Operating Environment 


PLINIT — 


PSPEED — 
PLCOPY — 
SETSIG — 
PLON — 
PLOFF — 


Plotter initialization routine to establish operating parameters for 
the plotter. 


Determines transmission rate between host computer and piotter. 
Establishes Standard or Copy mode. 

Selects the optional signature character. 

Turns the plotter logically on. 


Turns the plotter logically off. 


Character Size, Orientation and Type 


PLCHAR — 
LINROT — 
FONT — 


Establishes the plotter character size. 
Sets the angie of rotation for text lines on the plotter. 


Selects the character font. 


Graphic Input Routines 


PENLOC — 
DMGIN — 


VMGIN — 


4662401 Plot 10 Utuity Routines 


Returns the current pen status and location. 


Accepts a specified number of graphic inputs from the plotter, in 
screen coordinates. 


Accepts a specified number of graphic inputs from the plotter in 
screen coordinates and transforms them to virtual coordinates. 


USER ROUTINES 
PLINIT, PSPEED 


2-2 


ANCHO — 
-ANSTR — 
BAKSP — 
CARTN — 
CHRSIZ — 
ERASE — 
HOME — 
INITT — 
KIN — 
KCM — 
LINEF — 
NEWPAG — 
SCURSR — 
SETBUF — 


MODIFIED TCS USER ROUTINES 


Alphanumeric Character Out 
Alphanumeric String 

Backspace 

Carriage Return 

Character Size 

Erase 

Home 

Terminal Initialization 

Converts from inches to screen units 
Converts from centimeters to screen units 
Line Feed 

New Page 

Screen Cursor 


Set Buffer Type 


OPERATING ENVIRONMENT 


PLINIT (KDEVIC) 


. The PLINIT (Plotter tnitialization) routine determines which plotter device code is activated, 
and sets parameters to establish turn-around delay, prompt, bypass cance! characters and 
block size if specified during implementation of the Utility Routines. 


Parameter Entered: 


KDEVIC 


PSPEED (KCPS) 


1,2,3, or 4; corresponding to the plotter device address (A,B,C, or 
D) is set by the back panel switches. 
KDEVIC = 1 corresponds to A; 2 to B; 3 to C; and 4 to D. 


PSPEED (Plotter Speed) sets the mode of the host computer transmission to the plotter. if 
PSPEED is not called, the default value is the argument given in the INITT routine of TCS. 
When the low speed switch ts set on the plotter, PSPEED should be called with twice the vaiue 


of the INITT argument. 
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USER ROUTINES 
PLCOPY, SETSIG 


Parameter Entered: 


KCPS = 0 Block Mode; sets Buffer Type to 5. 


> 0 Continuous mode; this value supersedes the vatue of the 
argument given in !NITT during transmissions to the plotter. 


PLCOPY (KCOPY) 


PLCOPY (Plotter Copy Mode) informs the software of the position of Switch A, the 
Copy/Standard mode switch. 


lf PLCOPY is not invoked, the system assumes that Standard mode prevails. 
Appendix B defines Copy and Standard modes in detail. 
Parameter Entered: 


KCOPY is O when the plotter is in Standard mode; 1 when in Copy mode. 


SETSIG (KSIG) 
SETSIG (Set Plotter Signature Character) provides for selection of an optional signature 


character to precede each data transmission from the plotter. If SETSIG is not called, no 
signature character is used. 


The signature character, if designated, will be appended to the front of any data sent to the 
host. The character is a means of identification and can be used to identify particular devices. 


For example if three devices (A,B, and C) are on the same line, each device adds its signature 
character (A,B, or C) to the front of any data sent to the computer to designate the device 


sending the data. 


Any ASC!I character may be identified as the signature character except NUL (ADE = 0), 
SYNC {ADE = 22), or RUBOUT (ADE = 127). 


Parameter Entered: 


KS!IG The ADE representation of the character selected to serve as the 
signature character. 
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USER ROUTINES 
~ PLON, PLOFF 


PLON 


PLON (Plotter Logically On) stores data pertaining to terminal status, sends the PLOTTER ON 
command, and returns the plotter to the status it maintained when activity was terminated by 
the last PLOFF command. For instance, if the plotter has not been active since the last PLINIT 
command was issued, plotter status will be as described in the PLINIT routine description. 


NOTE 


Neither PLON nor PLOFF have any effect on the power source. The ON or OFF 
conditions treated by the two routines are logical conditions only. 


PLOFF 


The PLOFF (Plotter Logically Off) routine stores the data pertaining to plotter status, puts the 
PLOTTER OFF command into the TCS output buffer, and dumps the buffer to the plotter. The 
terminal is then returned to the status maintained when the plotter was last activated. 


SETTING THE ENVIRONMENT 


The program segment in Fig. 2-1 is a typical example of the commands required to establish 
the plotter operating environment. This example sets the terminal/host baud rate to 300, 
(terminal/host transmission rate to 30 characters/second), initializes device A, requests Block 
mode, selects Copy mode, sets the signature character to “ *” (ADE = 42), and turns the 

_ plotter logically ON. The INITT, PLINIT, and PLON commands are required to perform plotter 
operations. PSPEED, PLCOPY, and SETSIG are optional, depending on the parameters 
desired. The INITT routine is a modified TCS user routine. All others are plotter user routines. 
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USER ROUTINES 
PLCHAR 


CALL INITT C3) 
CALL PLINIT C12 

CALL PSPEED C@) 

CALL PLCOPY ¢i2 

CALL SETSIG C42) 
CALL PLON 


Fig. 2-1. Setting the Operating Environment. 


CHARACTER SIZE, ORIENTATION, AND TYPE 


The following routines are used to select plotter character size, the angle of rotation for text, 
and the character font. 


PLCHAR (!IHORSZ, IVERSZ) 


The PLCHAR (Plotter Character Size) routine sets the plotter text character size. Character 
width and height (IHORSZ and !VERSZ) are specified in plotter addressing units ranging for 0 
to 4095. Default size is 56 by 88. The actual! size and proportions of the characters depend on 
the plotting area defined by the lower-left and upper-right locations on the plotter bed, and the 
choice of Standard or Copy mode. 
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USER ROUTINES 
~  LINROT 


Calling CHRSIZ (a modified TCS subroutine), with the plotter enabled, is the same as Calling 
PLCHAR with the following equivalent arguments: 


PLCHAR CHRSIZ 
(56,88) (1) 
(51,82) (2) 
(34,53) (3) 
(31,48) (4) 


Parameters Entered: 


IHORSZ the width of a single character space. 


IVERSZ the vertical measurement of the distance between character tines. 


Horizontal and vertical size are defined as follows: 


A 
IVERSZ | AB 


tHORSZ 


_LINROT (DEGREE) 


LINROT (Character Line Rotation) is used to set the angle of rotation for text. When a positive 
DEGREE parameter is entered, rotation is counterclockwise from horizontal as shown in Fig. 
2-2. For a negative value, rotation is clockwise. DEGREE may be set to any value, and all 
following text is printed at this angie until LINROT is reset. 


The Carriage Return Reference Line is also altered by LINROT. The new reference line passes 
through the current pen location, is perpendicular to the line of text, and does not change until 


LINROT is invoked again, or until PLINIT is called. 


Parameter Entered: 


DEGREE a real number representing the degree of rotation. The angle of 
rotation can be positive, negative or fractional values. 
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USER ROUTINES 
LINROT 





CURRENT LOCATION 


CARRIAGE RETURN 
REFERENCE LINE 


\ 


‘ 


Fig. 2-2. Line Rotation. 


1f HOME or NEWPAG are used after LINROT has been invoked, the Carriage Return Reference 
Line wiil be shifted to intersect the HOME position as shown in Fig. 2-3. Attempting to write 
rotated alpha characters under this condition will cause unpredictable results if there is an 
attempt to write characters beyond the plotter surface boundary. 






HOME POSITION 


Carriage Return Carriage Return 
Reference Line After Reference Line Before 


Fig. 2-3. Line Rotation after NEWPAGE or HOME. 
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USER ROUTINES 


FONT 


FONT (IFONT) 


The FONT (Select Character Font) routine sends a command to the plotter to select the 
character set to be used. 


Parameter Entered: 


IFONT | an integer with a value of zero to six, inclusive. The value of IFONT 
determines character set selection. 
IFONT = 0 is the default. 


Character set variation is limited to the following ten characters. All other characters are 
identical in each font (see Appendix C). 


FoNT®O)=— #POC\ ITC: 3 
FONT! §=f£08Q568TAOA 


FONT2 «=f op SQ6UTAOU 
Fronts. So fg SCN\ITCi3 
ronut4 = Ee SINC TO 1 3 
rontS «= #GSSL\IT <u> 
ront6é =o¢$@C\ ITC: 3 


NOTE: 1f plotter has an optional character set with a font number of seven or 
larger, modification of the FONT routine is required. 


Fig. 2-4 is output from a program to set the plotter character size, set the angle of rotation for 
text, and select the desired character font. The first output in this example is drawn with 
character size 56 x 88, no line rotation (zero degrees), and font 0. The second output uses 56 x 
56, 45 degree rotation, and font 1. The third output has character size 30 x 88, 90 degree 
rotation, and font 2. The frames were drawn using TCS virtual relative vectors, rotated with the 
RROTAT routine. This example also uses the PENLOC command to request pen position 
information from the plotter. The program used to generate this example is listed following 
Fig. 2-4. 
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USER ROUTINES 
FONT 






Q DEGREES 
FONT @: 


P, 


Fig. 2-4. Rotated Text. 


C * PROGRAM TO DEMONSTRATE ROTATION, FONT TYPES, AND CHARACTER SIZES 
DIMENSION ICHAR(10), IFONT(8) , IDEGR(8) , INUM(2, 3), ICSZ(2, 3) 
DATA ICHAR/35,36,64,91,92,93,94,123,124,125/ 
DATA IFONT/32,70,79,78,84,32,32,58/ 
DATA IDEGR/32,68,69,71,82,69,69,83/ 
DATA INUM(1,1)/32/, INUM(1,2)/52/,INUM(1,3)/57/, 


& INUM(2,1)/48/, INUM(2,2)/53/, INUM(2,3)/48/ 
DATA ICSZ(1,1)/56/,1CS2(1,2)/56/,1CSZ(1,3)/30/, 
& ICSZ(2,1)/88/,1CS2Z(2,2)/56/, 1CSZ(2,3) /88/ 


C * INITIALIZE TCS 
CALL INITT (30) 
CALL TERM (3, 4096) 
C * INITIALIZE PLOTTER 
CALL PLINIT (1) 
Cc * COPY MODE 
CALL PLCOPY (1) 
CALL PLON 
CALL MOVABS (500,500) 
C * LOOP TO OUTPUT TEXT 
pO 100 J=1,3 
DEGR=(J-1)*45. 
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USER ROUTINES 
PENLOC 


C * SET CHARACTER AND LINE ROTATION 
CALL LINROT (DEGR) 
CALL RROTAT (DEGR) 
C * SET CHARACTER SIZE AND FONT 
CALL PLCHAR (ICSZ(1,J),1CSZ(2,J)) 
CALL FONT (J-1) 
LFONT(7)=47+J 
C * POSITION START OF TEXT 
CALL LINEF 
C * OUTPUT ROTATION IN DEGREES 
CALL ANSTR (2,INUM(1,J)) 
CALL ANSTR (8, IDEGR) 
CALL NEWLIN 
C * OUTPUT FONT TYPE MESSAGE 
CALL ANSTR (8, IFONT) 
CALL NEWLIN 
C * OUTPUT CHARACTERS 
CALL ANSTR (10, ICHAR) 
C * FRAME OUTPUT 
XLEN=LINWDT (10) 
YHGT=LINHGT (3) 
C * GET PEN LOCATION OF BOTTOM RIGHT HAND CORNER AND MOVE TO IT 
CALL PENLOC (IPEN,IX, IY) 
CALL MOVABS (IX, IY) 
C * DRAW A BOX CLOCKWISE AROUND TEXT 
CALL DRAWR (-YLEN,0.) 
CALL DRAWR (0. ,YHGT) 
CALL DRAWR (XLEN,0.) 
CALL DRAWR (0., -YHGT) 
C * MOVE TO UPPER RIGHT CORNER OF BOX 
CALL MOVER (0.,YHGT) 
100 CONTINUE 
C * TURNER PLOTTER LOGICALLY OFF 
CALL PLOFF 
CALL FINITT (0,0) 
END 


GRAPHIC INPUT ROUTINES 


PENLOC, DMGIN and VMGIN routines are used to return single or multiple pen status and 
location information to the host. 


PENLOC (IPEN, IX, IY) 


PENLOC (immediate Pen Location) performsa single immediate graphic input function on the 
plotter and returns the current pen status and location in screen coordinates. !f the plotter is 
not enabled, !X and IY are both set to —1. 
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USER ROUTINES 
DMGIN 


Parameters Returned: 


IPEN pen status, 0 = up, 1 = down. 
IX the X coordinate of the present pen location. 
lY the Y coordinate of the present pen location. 


The screen coordinates returned by PENLOC may be transformed to virtual coordinates by the 
TCS subroutine REVCOT (IX,IY,X,Y). The REVCOT subroutine converts entered parameters 
IX and IY to virtual coordinates and returns them as parameters X and Y. REVCOT is described 
in section 3.17 of the TCS Systems Manual. 


DMGIN (NUM, NREC, IPEN, KXRAY, KYRAY) 


DMGIN (Direct Multiple Graphic Input) allows the user to specify any number of screen 
coordinates. Either the crosshair on the 4010-series terminal or the CALL button on the plotter 
may be used. Differences in the operation of the terminal and plotter are described in the 
following paragraphs. 


Plotter Operation. OMGIN turns the plotter PROMPT light on and accepts the points and pen 
up-down status when the operator presses the CALL button. When the specified number of 
points have been received, DMGIN turns the PROMPT light off. Extra points transmitted after 
the PROMPT light has been turned off may cause program errors. Itis recommended that more 
points be specified than are expected. This prevents overrun problems or the need to count the 
number of points entered. Holding the CALL button down for approximately 1.6 seconds (until 
the plotter beil rings) will cause the plotter to send status instead of coordinates and will cause 
DMGIN to turn off the PROMPT light and return to the calling program. 


4010-Series Terminal Operation. DMGIN enables the graphic crosshair cursor on the terminal 
the specified number of times. Keyboard character and coordinate information similar to the 
TCS SCURSR routine (refer to the TCS User manual) is accepted. If the keyboard character 
“#" (ADE = 35) is returned by the terminal, DMGIN returns to the calling routine. , 


Parameters Entered: 


NUM an integer specifying the number of points requested. 
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USER RO 
VMGIN 


2-12 


UTINES 


Parameters Returned: 


NREC 


IPEN 


KXRAY 
KYRAY 


an integer specifying the number of points received, including the 
terminating point from the terminal (keyboard character" #"), but 
not including the status from the plotter. 


(Plotter operation) an integer array containing the pen status (up 
= 0, down = 1) for each point. 

(Terminal operation) an integer array containing the keyboard 
characters for each point (including the terminating #). 


an integer array containing the received X screen coordinates. 


an integer array containing the received Y screen coordinates. 


VMGIN (NUM, NREC, IPEN, XRAY, YRAY) 


VMGIN (Virtual Multiple Graphic Input) cails DMGIN and converts screen coordinates to 


virtual values. 


Parameters Entered: 


NUM 


Parameters Returned: 


NREC 
[PEN 


XRAY 
YRAY 


an integer designating the number of points requested. 


an integer indicating the number of points received. 


(Plotter) an integer array designating the pen status {up =0,down 
= 1) at each point. 
(Terminal) an array containing the keyboard character entered 


for each point. 


a real array of virtual X coordinate values. 


a real array of virtual Y coordinate values. 


Fig. 2-5 demonstrates the use of VMGIN with either a 4010-Series terminal or a plotter. Note 
that FORTRAN file {/O is also performed in this program, so that complex designs may be 
stored and recalled for later display. The program allows the operator to choose the Plotter or 
terminal and either new graphic input or previously stored data. A frame is drawn around the 
data window. Graphic input or previously stored data is obtained, and the data is then 
displayed. Plotter output obtained by using the “digitizing sight” (instead of the pen) to digitize 
(input) the data is shown in Fig. 2-5. This method of digitizing can be used to input any type of 
complex or reuseable information for later use. The prograrn used to generate Fig. 2-5 foliows 


the figure. 
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USER ROUTINES 
VMGIN 


TEKTROINI< 





Fig. 2-5. Digitizing Plotter Output. 


C * DEMONSTRATION OF GRAPHIC INPUT FROM TERMINAL OR PLOTTER 
C * INCLUDING STORAGE AND RETRIEVAL OF DATA ON MASS STORAGE DEVICE 
DIMENSION FRAMEX(4) , FRAMEY (4), IPEN(200) , XRAY (200) , YRAY (200) 
DATA FRAMEK/1.,1.,0.,0. /, FRAMEY/0.,1.,1.,0./ 
DATA TPEN/200*0/ .XRAY/200%0,/, YRAY/200%0. / 
C * ASK THE OPERATOR IF HE IS USING PLOTTER OR TERMINAL 
WRITE (6,100) 
100 FORMAT (1X,37HENTER 0 FOR TERMINAL, 1 FOR PLOTTER: ) 
READ (5,200) ITORP 
200 FORMAT (11) 
C * ASK THE OPERATOR IF HE WANTS TO RETRIEVE OLD DATA 
C * OR GENERATE NEW 
WRITE (6,300) 
300 FORMAT (1X,51HENTER 0 FOR GRAPHIC INPUT, 1 FOR INPUT FROM UNIT 1:) 
READ (5,200) IGIN 
C * INITIALIZE THE PLOTTER AND. TERMINAL 
CALL INITT (30) 
IF (ITORP.EQ.1) CALL PLINIT (1) 
IF (ITORP.EQ.1) CALL PLON 


4662A01 Plot 10 Utility Routines @ : 2- T 3 


USER ROUTINES 
VMGIN 


C * SPECIFY WINDOWS 
CALL TWINDO (100,900,100,600) 
CALL DWINDO (0.,1.,0.,1.) 

C * DRAW FRAME 
CALL MOVEA (FRAMEX (4), FRAMEY(4)) 
DO 10 I=1,4 
CALL DRAWA (FRAMEX(I), FRAMEY(I)) 

10 CONTINUE . 

C * BRANCH FOR GRAPHIC INPUT OR INPUT FROM UNIT 1 
IF (IGIN.EQ.0) GO TO 20 
REWIND 1 
READ (1,400) NREC 
READ (1,500) (IPEN(I),I=1,NREC) 
READ (1,600) (XRAY(I),I=1,NREC) 
READ (1,600) (YRAY(1I), I=1,NREC) 
GO TO 30 

C * REQUEST 200 GRAPHIC INPUTS 

20 CALL VMGIN (200,NREC, IPEN, XRAY, YRAY) 

C * MOVE OR DRAW, IF PEN UP OR DOWN, OR IF "M" OR "D" RECEIVED 

30 DO 40 I=1,NREC 
IF (IPEN(I).EQ.0 .OR. IPEN(I).EQ.77) CALL MOVEA (XRAY(I), YRAY(T)) 
IF (IPEN(I).EQ.1 .OR. IPEN(I).EQ.68) CALL DRAWA (XRAY(I),YRAY(I)) 

40 CONTINUE 

C * TURN PLOTTER LOGICALLY OFF IF IT WAS ON. 
CALL PLOFF 

C * SAVE THE DATA ON MASS STORAGE UNIT 1 
IF (IGIN.EQ.1) GO TO 50 
REWIND 1 
WRITE (1,400) NREC 

400 FORMAT (13) 

. WRITE (1,500) (CIPEN(I),I=1,NREC) 

500 FORMAT (20012) 
WRITE (1,600) (XRAY(I),1=1,NREC) 
WRITE (1,600) (YRAY(I),I=1,NREC) 

600 FORMAT (200F6.4) 

C * END THE PROGRAM 

50 CALL FINITT (0,0) 
END 


MODIFIED TCS USER ROUTINES 


All modified routines described continue to function as explained in the TCS User's Manual. 
When PLON has been called to activate the Plotter, these routines perform the additional 
operations explained here. . 
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USER ROUTINES 
ANCHO, ANSTR, BAKSP, CARTN, CHRSIZ 


ANCHO (ICHAR) 


This routine (Alphanumeric Character Out) will call ANSTR to transmit a single non-control 
character and to continuously remember the pen position. 
Parameter Entered: 


ICHAR The ADE vaiue of the non-control character to be transmitted. 


ANSTR (NCHAR, JADE) 


ANSTR (Alphanumeric String) has been altered to handle various character sizes. Character 
rotation during Block mode transmission and timing considerations during Continuous mode 
transmission are treated. 


Parameters Entered: 


NCHAR is the number of ADE values in the integer array I[ADE. 
[ADE an integer array containing non-control characters. 
BAKSP 


BAKSP (Backspace) accommodates transmission of rotated and scaled text to the Plotter. 


CARTN 


CARTN (Carriage Return) a routine for generating a carriage return command to 
accommodate rotated text. 


CHRSIZ (ICHAR) 


This routine (Character Size) is responsible for adjustment of character size and spacing. The 
routine was altered to call PLCHAR if the Plotter is enabled. 


Parameter Entered: . 


~ 


ICHAR an integer value between 1 and 4, inclusive, which determines 
character size. 
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USER ROUTINES 
ERASE, HOME, INITT . 


When a Tektronix 4662 plotter is used, character size is in accordance with Table 2- 1. The table 
is based on the assumption that the plotter is in Standard mode with default lower left and 
upper right corner settings. 


Table 2-1 
Character Size Description 


ICHAR PLCHAR Character Size* Characters 

Value Equivalents Per Inch 
RE CI (ip RIE Pl I IAS il NS PS PIES ERE CETTE Se 
a 56 x 88 205 x 323 {.5207 x .82042) 
ed ror 301 Laveae x ease | eas | 
aoe 


[sexes | wsevesiavrexoe | sov | sm | ABCDEFGH 
aes | er aes ar ABCDEFGHI 


* Character sizes are in thousandths of an inch. Metric equivalents {in centimeters} are shown in parentheses. 
ICHAR will default to 1 if any character size other than 1, 2, 3, 4 is specified. 






Lines 
[Pr se ee ee tet y 


a) ABODE 
ps2 | ABCDEF | 









ERASE 


The ERASE routine inhibits the terminal ERASE command if the plotter is active. With the 
plotter off, ERASE clears the terminal screen. When the plotter is addressed, ERASE does 
nothing. 


HOME 


. The HOME routine generates a move to the home position at the upper left corner of the screen 


and plotter. Home position is actually the lower left corner of a character that wiil fit in the 
upper left corner of the paper. Therefore, HOME position is determined by the current selected 
character size. 


INITT (IBAUD) 


The INITT routine initializes parameter values and informs the software that the plotter is 
logically “off”. 


Parameter Entered: 


iIBAUD an integer value designating the number of transmitted 
characters per second. . 
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USER ROUTINES 
KIN, KCM, LINEF, NEWPAG, SCURSR 


KIN (RJ) 


The KIN (Converted from Inches) function converts the value, stated in inches, to screen or 
plotter units. The converted value is returned through KIN. 


Parameter Entered: 


Ri A real number representing inches to be converted to screen or 
plotter units. 


. KCM (RC) 


KCM {converted from centimeters), like the KIN function, converts a value to plotter units. The 
difference is that KCM input values are stated in centimeters. The converted value is returned 
through KCM. 


Parameter Entered: 


RC areal number representing centimeters to be converted to plotter 
units. 


The command "CALL DRWABS (KIN(2.5), KCM(5.5))" would cause a line to be drawn toa 
point 2 1/2 inches in the X direction and 5 1/2 centimeters in the Y direction, from the current 
beam or pen position. Default upper right and fower left settings are assumed. 


LINEF 


LINEF (Line Feed) now allows for scaled and rotated line feeds. Referto LINROT for additional 
information. 


NEWPAG 


This routine, New Page, will generate a move to the home position when the plotter is active. 


SCURSR (ICHAR,IX,IY) 


SCURSR (Screen Cursor) calls the DMGIN routine with the NUM parameter set to 1. When the 
Plotter is ON, DMGIN returns the pen status (up or down) and the X and Y device coordinates. If 
the Plotter is turned OFF, SCURSR functions as it did before modification. 
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USER ROUTINES 
SETBUF 


Parameters Returned: 


ICHAR the pen status indicator (0= pen up, 1 = pen down) or the terminal 
keyboard character. 


IX AND IY the integer device coordinates. IX range is 0 to 4095 and IY range 
is 0 to 2731 in Standard mode. IX range is 0 ro 4095 and IY rangeis 
0 to 3124 in Copy mode. In default condition (Terminal Type 1) IX 
and 1lY¥ ranges are 0 to 1023. 


SETBUF (KFORM) 


SETBUF (Set Buffer Type) prevents changing of buffer type from 5 while in Block mode. Buffer 
type 5 is used in Block mode only, and cannot be selected by this routine. Buffer type 5 is set 
when PSPEED is called with 0. 


Parameter Entered: 


KFORM an integer indicating the desired buffer type; 1,2,3, or 4. 
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Section 3 


SYSTEM ROUTINES 


System Routines, although not normally accessed during plotter operation, are described here 
for your convenience. DIGPAK and TKSYNC are new routines required to support the 4662. 
BUFFPK and XYCNVT are modified versions of the existing TCS routines. 


PLOTTER SYSTEM ROUTINES 


The two routines described below have been written especially to support terminal/plotter 


_ systems. 


DIGPAK (NUM, MAXDIG, KRAY, NUMDIG) 


DIGPAK packs the ADE of digits into an array. Used internally, DIGPAK is not intended to be 
called by the user but is an integral part of the system programming. 


Parameters Entered: 


NUM an integer to be translated into an ADE value. 


MAXDIG an integer. The number of digits in the MAXDiG integer specifies 
the maximum number of KRAY elements returned. 


Parameters Returned: 


KRAY an integer array which holds the ADE values of digits in NUM. 
NUMDIG . an integer indicating the number of digits, converted to ADE, 


packed into KRAY. 


TKSYNC (NUM) 


To allow sufficient time for the peripheral to complete execution of each command, TKSYNC 
(Output SYNC Characters) provides padding in the form of SYNC's (ADE = 22). These SYNC 
characters have no visible effect on plotter or terminal. This routine is called by ANSTR, 
JOWAIT, and XYCNVT. 


Parameter Entered: 


NUM an integer determining the number of SYNCs to transmit. 
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SYSTEM ROUTINES 
BUFFPK, IOWAIT 


MODIFIED TCS SYSTEM ROUTINES 


The following routines have been modified to accommodate the plotter. 


BUFFPK (NCHAR, IOUT) 


BUFFPK (Pack Buffer) modification created a new buffer type (type no. 5) to be used in Block 
mode. The buffer is automatically dumped when full, or it can be dumped by the TCS ANMODE 
and TSEND routines. 


in Block mode, achecksum is sent with the transmitted data and must be acknowledged by the 
plotter. When an error is detected, 4 re-transmissions are attempted. !f the error persists after 5 
attempts, a STOP command is issued. If there are no errors, the buffer is refilled with the next 
segment of data. 


If poor or noisy communications lines cause plotting errors when operating in Continuous 
mode, Block mode is suggested. Data integrity is assured with no loss in plotting efficiency. 


Block mode is selected by setting the KCPS parameter of the PSPEED user routine to zero. 


Parameters Entered: 


NCHAR the number of ADE values to be added to the buffer. 


lOUT the array containing the ADE representations of characters to be 
added to the buffer. 


IOWAIT (ITIME) 


This routine (I/O Wait) is responsible for treatment of timing considerations (command 
execution time). Itcalls TKSYNC for an appropriate number of SYNC’s which act as a delay. In 
Block Mode, no delay is necessary and TKSYNC is not called. 


Parameter Entered: 


ITIME the wait time specified in tenths of seconds. 
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SYSTEM ROUTINES 
MODIFIED SYSTEM F XYCNVT 


XYCNVT (1X, 1Y) 


XYCNVT (X Y Convert) converts an X Y coordinate into the TEK graphics coding scheme and 
provides the ability to pad vector output when transmission to the plotter is in Continuous 
mode. Padding is necessary because more time is required to draw vectors than to transmit 
data. 


Continuous mode transmission sends data in a steady stream and facilitates storage of output 
on auxiliary devices such as magnetic tape units. The stored output may then be transferred to 
the plotter at a more convenient time. Transmitted data is checked for proper parity, as 
determined by switch C (see Table B-1). 


In Continuous mode, vector and alpha output to the plotter are padded with SYNC’s 
(ADE = 22) to avoid plotter command overflow. The padding characters provide spacing 
between commands issued to the plotter, but do not change the appearance of output. Plotter 
speed is not significantly degraded by the added padding characters. 


Parameters Entered: 


IX and IY the integer screen coordinates. 
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APPENDIX A . 


COMMON VARIABLES 


in addition to the existing COMMON area (/TKTRNX/}, the 4662 A01 Plot 10 Utility Routines 
provide another COMMON area in the modified TCS. This COMMON, named /TKPLOT/, 
contains the system variables described below. 


TABLE A-1 
/TKPLOT/ COMMON VARIABLES 


CHORWX the distance to move in the X direction for a character space. 

CHORWY the distance to move in the Y direction for a character space. 

IDEVIC the ADE vaiue of the current device code. 

ION an integer indicating plotter or terminal mode. 0 = terminal 
mode; 1 = plotter mode. 

IPBAUD the integer representation of the transmission rate used for 
Continuous mode padding. The rate is given in characters per 
second. When Block mode is used, IPBAUD = 0. 

IPMAXY maximum Y coordinate value. 

ISIG an integer representing the ADE value of the signature character. 

LOC! the integer value of the X coordinate at the point where rotation 
was set. 

LOC2 the integer value of the Y coordinate at the point where rotation 
was set. 

PLSTAT a real array of sixty words. Used to retain plotter status 
information. 

TMSTAT a real array of sixty words. Used to retain terminal status 
information. 

XLINEF the distance in the x direction for a line-feed. 

YLINEF the distance in the Y direction for a line-feed. 

ZDEGR the real number denoting the text rotation angle, in degrees. 


Table A-2 lists variables from both COMMON areas, /TKTRNX/ and /TKPLOT/. (Only variables 
effected by the Utility Routines are listed.) A'"1” in the table indicates that the variable is 

referenced by the corresponding routine; "2" identifies the routine in which the variable is 
defined; and "3" means the variable is both defined and referenced by the routine indicated. 
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VARIABLES 


COMMON 


COMMON VARIABLES. 


— 


99302 
aaNTIA 
AINITX 
1VISWE 
LViSid 
fJ01 
O71 
SIXVZ> 
S83AH 
INA 
VL» 
WH3i> 
ASZISH 
NOYWHN 
YVHUdH 
avd 





AMUYOHD 
XMYOHS 


ROUTINES 


Pty ET a i a a 
A REE Sl) Pe (a PA a Wa te Ce 


4662A01 Plot 10 Utdlity Routines 


A-2 


APPENDIX B 


SWITCH OPTION SETTINGS 


Settings of the four switches located on the rear panel of the 4662 Plotter are described in detail 
in the Plotter Operator’s Manual. Table 2-1 is a summary of these settings. 


TABLE B-1 
Switch Option Settings 





Switch A Switch B 


Inhibit 
Terminal 
Mute 

















Low Plotting Delete 














Speed Effect Interpetation Terminator Bits 





1 = CR—-CR+LF 1 = tGNORE 00 = NONE 
Bits 


0=no = = 0 = DEL—LOY 01 = CR 
10 = CR+EOT 0= 1 Stop 


Bits 





Switch C Switch D 
Parity RS-232-C Device Data Transfer 
Interface Address Rate {Baud) 
Select 
11 = Odd 000 = 150 baud 
10 = even 001 = 300 baud 
01 = none 010 = 600 baud 
00 = none 014 = 1200 baud 





100 = 110 baud 


LOW PLOTTING SPEED 


The low plotting speed option afforded by switch A permits use of non-standard pens requiring 
slower writing speed. Pen acceleration is approximately one-fourth the standard speed 
acceleration rate, and writing speed is at about half the standard rate. 


To prevent plotter command overflow caused by the timing considerations of Continuous 
mode, Block mode is recommended for use in low plotting speed. If Continuous mode is 
elected however, the KCPS argument of the PSPEED routine should be set to two or three 
times the actual transmission rate value. 


4362A01 Plot 10 Utiity Routines @ B-1 


APPENDIX B 
STANDARD OR COPY MODE 


B-2 


STANDARD OR COPY MODE 


The setting of switch A also determines whether the Plotter will operate in Standard mode or 
Copy mode. These modes are entirely hardware dependent and cannot be over-ridden by 
software routines. 


The explanatory information which follows defines the differences between Standard and 
Copy mode. 


Aspect ratio is the relationship between the height and width of a graphic representation. 

Because the terminal screen and the Plotter surface do not have the same aspect ratio, uniform 
horizontal and vertical incrementation can result in loss of data if the full width of the display 

screen is used. This fact is illustrated by Fig. B-1. 


[| 


TERMINAL PLOTTER 


Fig, B-1. Standard Mode. 
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The uniform incrementation demonstrated in Standard mode is retained in Copy mode by 
placing the right side of the Plotter surface “out of bounds”, thus maintaining the correctratio 
between height and width. 


if the Plotter had been set to Copy mode, the graphic output to the Plotter would have appeared 
as shown in Fig. B-2. 


TERMINAL PLOTTER 


Fig. B-2. Copy Mode. 
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Fig. B-3, a representation of the Plotter surface, defines the addressable portions of the Plotter 
and identifies the maximum usable coordinates for Standard and Copy modes. 


(4995, 2731) 


Upper right 
corner 














19 inches 
Lower left 
corner 
Nenana, 
(0.9) 15 inches (4995,9) 
STANDARD Mode 
13.1 inches (4995,3124) 
Upper right 
corner shaded area 
not addressable 
19 inches 


Lower left 
corner 


Se 
=15 inches 








(9.8) | 
(4995,9) 


COPY Mode 


Fig. 8-3. Standard and Copy Mode Coordinate 


When the PLINIT routine is invoked to activate the plotter, the mode is assumed to be Standard. _ 
To inform the software whether the plotter is in Standard or Copy mode, call the PLCOPY 
routine. 
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CHARACTER FONTS 


Font @ 


I" # $28 CI*+,-./8123456789: ; <=>? 
@ABCDEFGHIUKLMNOPGRSTUVWXYZE\I7_ 
‘abcdefghi jk|l mnoparstuvwxyzli3}~ 

rot 1" £o%8/ C¥+, —. /0123456789: ; <=>? 
8 ABCDEF GHIUKLMNOPQRSTUVWXY ZacatT _ 
‘abcdefghi jkl mnoparstuvwxyzAGA~ 


Font 2 


1 Leas CO*t y=. 7 C1 23456789) s<=>P 


SABCDEF GHIUKLMNOPOQRSTUVWXY ZasuT__ 


Font 3 


I" £o%8 CO*+,-—./8123456789: ; <=>? 
8S ABCDEF GHIJKLMNOPORSTUVWXYZC\IT_ 
‘abedefghi jklmnopgrstuvwxyzli3}~ 

ror" 1 £GKR! Cet, —. /8123456789: ; <=>? 
SABCDEF GHIJKLMNOPORSTUVWXYZINET_ 
‘abcdefghi jk|l mnoparstuvwxyzli}~ 


Font 5 


1" #S28° COx+,-./8123456789: ; <=>? 
8 ABCDEF GHIUKLMNOPQRSTUVWXYZE\IT_ 
‘abcdefghi jkl mnoparstuvwxyz¥éu>~ 


Font 6 


P"#$28 CO¥+,-./0123456789: ; <=>? 
@ABCDEF GHIUKLMNOPQRSTUVWXYZONIT_ 
‘abcdefghi jklmnoparstuvwxyzli3~ 


Fig. C-?. Optional Character Fonts. 
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ASCII CODE CHART 














GRAPHIC INPUT 


> 
4) 
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CONTROL 
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Fig. D-1. ASCII Function Code Chart. 
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4662A01 PLOT 1$ UTILITY ROUTINES 


The 4662A01 PLOT 16 Utility Routines are designed to extend the 
features of the Tektronix Terminal Control System (TCS) to the 


Tektronix 4662 Digital Plotter while providing support to the special 


features of the Plotter. Implementing this package consists. of 


replacing several TCS routines with routines modified to accommodate 


the 4662 plotter and the addition of several new routines. 


IMPLEMENTATION PROCEDURE 


If you do not have Release 3.3. of the Terminal Control System, 
you must either obtain it and implement it or update your older 
version. See Appendix A for information on updating Release 3.2 


to 3.3 standards. 


Determine the I/0 protocol necessary for your data communication 
system as described in the Compile Time Options section and make 
changes to the subroutine PLINIT accordingly. 


Make sure the defaults established by the Utility Routines 


version of INITT are appropriate. See Appendix B for information. 


If your version of TCS uses an output buffer size different. than 


72, make the modifications described in Appendix C. 


If the subroutines CARIN, LINEF or BAKSP do not operate appropri- 
ately (i.e., a 4006 terminal cannot do a backspace), modify them 
as described in Appendix D to do graphic moves instead of trang- 


mitting control characters. 


Compile the Utility Routines and create a load library as follows. 


The utility routines are divided into two groups; Modified TCS 
Routines, and Plotter Routines. The modified TCS routines replace 
the corresponding TCS routines and are in the same order as found 
in the standard TCS package. 
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The utility routines can be merged into the existing TCS package 
or stored in a separate library. The separate library may be 
used when your system allows loading from a separate library 

(with a preference given to one), and when a significant amount of 
TCS work may be done without a plotter. This allows the 4662A01 
routines to be stored in the separate library and linked to 

when desired. If separate libraries are not available the 


utility routines should be merged with TCS as follows: 


Replace the following existing TCS routines with the modified 
utility routines. 


KIN ANSTR NEWPAG 
KCM CARTN TOWAIT 
SCURSR LINEF XYCNVT 
INITT BAKSP CHRSI2 
SETBUF HOME BUFFPK 
ANCHO ERASE 


Add the new routines to your library. If loader order is needed, 


insert the following routines between the TERM and DASHR subroutines. 


FONT 
LINROT 
PENLOC 
PLCOPY 
PLINIT 
PSPEED 
SETSIG 
VMGIN 
PLOFF 
PLON 
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Add the remaining routines as follows: 
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DMGIN 

PLCHAR 
TKSYNC 
DIGPAK 


after SCURSR and before ALIN 
after CHSIZ and before CZAXIS 
after TOUTST and before BUFFPK 


after BUFFPK and before PLTCHR 


1-3 


1-4 


COMPILE TIME OPTIONS 


The utility routines have several options incorporated into the 
program to allow tha user to modify the operation of the routines 

to suit specific host configurations. These options must be selected 
when the 4662A01 Utility Routines are implemented. Each of the 
changes and the reason for making the change is described in more 


detail in the following paragraphs. 


PLINIT Modifications 


The PLINIT subroutine contains provisions for selecting prompt char- 
acters, setting turn-around delay, specifying buffer size, and 
selecting the Bypass Cancel Character. These changes are made by 
deleting the comment characters "C *"' from the code and changing 


the contents of the line as described in the following paragraphs. 


Prompt Character. Required by systems or devices which can only 

accept input when requested. These systems normally output a prompt 
character to indicate to the user that the host is ready to accept 
input data. If your system does not use a prompt character, no change 
is required. If a prompt character is used, change the following three 


lines of code in PLINIT: 


From To 
CG * ICODE(3)=82 ICODE (3)=82 
C * ICODE(4)=63 ICODE (4)=63 
C * CALL TOUTST(4, ICODE) - CALL TOUTST (4, ICODE) 
NOTE 


If a prompt character other than "?" is used 
change ICODE(4)=63 to tha ASCII 
Decimal Equivalent (ADE) value of the prompt 


character. 
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Turn-Around Delay. Some systems require a time delay between the 
time the last character was transmitted and the next character is 
received or between transmissions from the plotter. If the system 
does not require this delay no change is required. The turn-around 
delay is set to 200 milliseconds in PLINIT. To enable the delay, 


change the following lines of code: 


From 
* N=200 
*PACK IN THE DIGITS 
* CALL DIGPAK(N, 10000, ICODE(4) ,NUMDIG) 
* ICODE(3)=71 
* K=NUMDIG+3 
* CALL TOUTST(K, ICODE) 


ananaa a Oo 


To 
N=200 Or the required delay in msec. 
c *PACK IN THE DIGITS 
CALL DIGPAK(N,10000, ICODE(4) ,NUMDIG) 
ICODE(3)=71 
K=NUMDIG+3 
CALL TOUTST(K, ICODE) 


Buffer Size. The buffer is set to 72 by PLINIT. Some 
systems require larger or smaller buffer sizes for efficient operation. 
Changing the buffer size requires modifications to the INITT and BUFFPK 
routines as well as the PLINIT routine. The buffer size is defined 
by the following lines of code in the PLINIT routine; 
C* SEND THE HOST OUTPUT BUFFER SIZE 
LCODE(3)=72 
ICODE(4)=55 
ICODE(5)=50 
CALL TOUTST (5, ICODE) 


Complete instructions for changing the buffer size are contained in 


Appendix C. 
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Bypass Cancel Character. In some cases the computer may echo or send 
characters to the plotter which should not be written on the plotter 
surface. These characters can be suppressed in the plotter by 
enabling the bypass cancel character. When the bypass cancel char- 
acter is enabled, the plotter will set bypass mode each time it 
transmits to the host. In bypass mode the plotter logic ignores all 
of the characters from the host until the bypass cancel character is 
received. The receipt of the bypass cancel character restores the 


-” 


plotter to normal operation. 


It should be noted that the bypass cancel character specified in the 
initial version of the Utility Routines is an LF (ADE = 10), which we 


recommend implementing in most casas. 


The bypass cancel character is enabled by changing the following lines 


of code: 
From To 
C *SET THE CANCEL BYPASS CHARACTER C *SET THE CANCEL BYPASS CHARACTER 
TO LF (ADE 10) TO LF (ADE 10) 
c * ITCODE(3)=85 | ICDOE(3)=85 
c* ICODE(4)=10 ~ ICODE(4)=10 
c* CALL TOUTST(4,ICODE) CALL TOUTST (4, ICODE) 


If a character other than LF is desired for the cancel bypass character, 


enter the ADE for the character in ICODE (4). 
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ADAPTING RELEASE 3.2 OF TCS 


NOTE 
These fixes will allow you to properly run 
your 4662AQ1 routines, it will not bring 
your TCS up to Release 3.3. 


Replace TOUTST and PLTCHR with the following modifications. 


NEU CODE 

SUBROUTINE TOUTST(LEN, IADE) 

COMMON /TKTRNX/ TMHINYX, TNINUY, TMAXUX, TMAXUY, TREALX, TREALY, 
& TIMAGX.TIMAGY, TRCOSF,.TRSINF,TRSCAL,TRFACX,TRFACY, 
& TRPARI, TRPAR2, TRPAR3. TRPAR4, TRPARS. TRPARG. KMOFLG(2), 
& KGNMOD,. KPADU.KACHAR, KOBLEN. KTRAIL, KLEVEL,KPADC. 
& KBAUDR,KGNFLG, KGRAFL, KHOMEY, KKMODE. KHORSZ,KUERSZ,KTBLSZ, 
& KSIZEF. KLMRGH,KRRRGN, KFACTR,KTERM, KLINE, KZAXIS,KREAMX,KBEANY, 
& KMOVEF .KPCHAR(S ),.KDASHT .KMINSX,KMINSY. KMAXSX,KMAXSY,.KEYCON, 
& KINLFT.KOTLFT.KUNIT- 

DIMENSION TADE(1) 

LENOUT=LEN 

IF(LENQUT (GT. KACHAR)LENOUT=KACHAR 

CALL BUFFPK(LENOUT, IADE) 

RETURN | 

END 
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NEW CODE 
-SUBROUTINE PLTCHR(IX. IY. ICHAR) | 
COMMON /TKTRNX/ TMINUX, THENUY, THAXUX, THAXUY. TREALX. TREALY, 
& TIMAGX, TIMAGY, TRCOSF. TRSINF, TRSCAL, TRFACX, TREACY, 
& TRPARI. TRPAR2, TRPARI, TRPAR4, TRPARS, TRPARG, KMOFLG(2), 
& KGNMOD. KPADU. KACHAR, KORLEN, KTRAIL, KLEVEL. KPADG, 
& KBAUDR, KGNFLG, KGRAFL KHOTIEY, KKMODE . KHORSZ, KUERS2 .KTRLSZ. 
& KSIZEF .KLMRGN, KRIRGH, KFACTRKTERM. KLINE KZAXIS, RPEAMY KREAMY, 
& KMOVEF .KPCHAR(S),KDASHT. KMINSX, KMINSY, KMAXSX, KMAXSY. KEVCON, 
-& KINLFT,KOTLET, KUNIT | 
DIMENSION ICHAR(1) 
C X CALCULATE THE PLOT CHARACTERS TO ARRIVE AT IX. Iv 
C X ORDER IS HIY, LSBYX, LOY. HIX, LOX 
KX=IXtKFACTR 
KY=IYXKFACTR 
IF(KX LT @)KX=9 
IF(KY LT. @)KY=0 
ICHAR(1)=MOD(KY/128; 32432 
ICHAR(2) =MOD(KY, 4 )44MOD(KX, 4496 
ICHAR(3)=MOD(KY/4, 32)+96 
ICHAR(4)=MOD(KX/128, 32)+32 
ICHAR(S )*MOD(KX/4, 32)+64 
IF(KBAUDR LT. 480) GO TO 11 
ITENP=KPAD2-1 
IF(KTERM LT. 2) GO TO 1¢ 
ITEMP= TABS (KBEAMX-IX)+IABS(KBEAMY-IY) 
ITEMP=ITEMPXKPADOXKFACTR/B192 + 4 
10 KPADU=ITENP : 
11 CONTINUE 
RETURN 
END 
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UTILITY ROUTINE DEFAULT MODIFICATIONS 


INITT and PLINIT initialize several parameters when called. These 
parameters (default buffer type, terminal type, character size, 
and block mode transmission) may be changed using the following 


procedures. 


Default Buffer Type 


In the INITT subroutine change CALL SETBUF(1) to the desired 
buffer type. 


Default Terminal Type 


In the INITT subroutine change KTERM=1 to the desired terminal 


type. 


Default Character Size 


In the RESET subroutine of the standard TCS package change 

IF (KTERM.GE.2) CALL CHRSIZ(1) to the desired character size. 

It should be noted that character size change is only valid 

for the plotter and 4014/4015 terminals (terminal types 2 or 3). 


Default Plotter Communication to Block Mode 


In the PLINIT subroutine change the statement IPBAUD=KBAUDR 
to IPBAUD=0. 
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OUTPUT BUFFER SIZE MODIFICATION 


The Utility Routines contain a BUFFPK subroutine which replaces 
the standard TCS buffering routine. The buffer is normally set 
for 72 characters. If the operating system requires a larger or 
smaller buffer size for efficient operation the buffer size can 


be changed as follows: 


INITT Subroutine 


Change KOBLEN=72 to KOBLEN=XXX where XXX equals the 


desired buffer size. 


BUFFPK Subroutine 


Change DIMENSION IDATA(72) ,ISYNC(5) , INBUFF (72) ,IRESP(3) , IOUT(1) 
to DIMENSION IDATA(XXX) ,ISYNC(5) , INBUFF (72), IRESP (3) , IOUT (1) 


where XXX equals the desired buffer size. 


Change DATA MAXLEN,LENOUT ,NODATA/72,0,1/ 
to DATA MAXLEN, LENOUT ,NODATA/XXX,0,1/ 
where XXX equals the desired buffer size. 


PLINIT Subroutine 


Change the host output buffer size 72 specified by ICODE(4)=55 
and ICODE(5)=5f statements to the desired size (the buffer 
Size is defined in ADE). 


Change the TOUTST statement to agree with the selected 


buffer size. 


For example, to set the host output buffer size to 132, change 


the code to appear as follows: 


C * SEND THE HOST OUTPUT BUFFER SIZE 


ICODE(3)=72 
ICODE(4)=49 
ICODE(5)=51 
ICODE (6)=5¢ 
CALL TOUTST (6,ICODE) 
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PROBLEM RESOLUTION 


The following program modifications permit the Carriage Return, 
Line Feed and Backspace operations to be performed by 8raphic 
move operations for devices which do not respond to the correspond- 


ing Control Characters. 


CARTN Modifications 


Delete everything from IF (KKMODE.NE.O)CALL ALFMOD 
to (and including) 30 RETURN 
Add GO TO 30 


5 KBEAMX=KLMRGN 

30 CALL MOVABS (KBEAMX, KBEAMY) 
CALL ALFMOD 
RETURN 


BAKSP Modifications 


Delete the following: 
IF (KKMODE.NE.0)CALL ALFMOD 
Cc *OUTPUT (BS) 
CALL TOUTPT(8) 
10 RETURN 
END 


Add the following: 


10 CALL MOVABS (KBEAMX, KBEAMY ) 
CALL ALFMOD 
RETURN 
END 
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CONSIDERATIONS FOR IBM IMPLEMENTATIONS 


TCS imlemented for IBM with TSO is slightly different from 
standard TCS, and the following changes to the Utility Routines 


should be made for use on an IBM-TSO system: 


1. Change the output buffer size to 132, as 
described in Appendix C. 


2. Delete buffer type 1 and 2 from BUFFPK by 
deleting all code from and including 
GO TO (20,30,40,45,480) ,KUNIT (after statement 10) 
to 
GO TO 50 (before statement 40) 
and adding 
IF (KUNIT.EQ.5) GO TO 480 (before statement 40) 


3. Implement prompt mode by enabling the prompt 
character in PLINIT as described in the Compile 
Time Options section, and by adding the 


following code: 


In BUFFPK: 
before: DATA MAXLEN,LENOUT ,NODATA/132,¢,1/ 
add: DIMENSION IPRMT(1) 
DATA IPRMT(1) /63/ 
and 


before: 486 CALL ADEIN(MCHAR, INBUFF) 


add: CALL ADEOUT(1,IPRMT) 
In PENLOC: 

before: 20 CALL TINPUT(ICHAR) 

add: - CALL TOUTPT (63) 
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In DMGIN: 
before: 
add: 


and 
before: 
add: 


DATA KSTOP/35/,°°° 
DIMENSION IPRMT(1) 
DATA LPRMT(1) /63/ 


CALL ADEIN(N, IN) 
CALL ADEOUT(1, IPRMT) 
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UTILITY ROUTINES CHECK LIST 


Read the entire 4662A01 Utility Routine Implementation Notes. 
Update TCS to Release 3.3 if required (see Appendix A). 
Select the appropriate Compile Time Options. 

["] a. 
[J »>- 
me 
[_] 4. 


Change Default Conditions if required (see Appendix B). 


Prompt. Character 
Turn-around Delay 
Buffer Size 


Bypass Cancel Character 


Change Output Buffer Size if required (see Appendix C). 
Enable Graphic moves in place of the CR, LF, and BS control 
characters if your system does not handle these control 
characters properly. (See Appendix D.) 

If you have the TSO version of TCS change the buffer types 
as described in Appendix E. 

Compile the Utility Routine and TCS source codes. 

Merge (or not) the Utility Routine object module with the 
TCS Release 3.3 object module. 


Enjoy your updated version of TCS and the plotter Utility 


Routines. 
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DELETE the following: 
before: CALL ADEIN(N,IN) 


add: CALL ADEOUT(1, IPRMT) 


ADD the following: 
replace: 550 CALL ADEIN(N,IN) 


with: 550 CALL ADEOUT(1,IPRMT) 
CALL ADEIN(N, IN) 


PAGE 1 OF 1 


